﻿Public Class DangNhapBUS
    Public Shared Function GetDangNhap(ByVal id As String) As DangNhapDTO
        Dim da As New DangNhapDAO()
        Return da.GetDangNhap(id)
    End Function
    Public Function GetTaiKhoan() As DataTable
        Dim tk As New DangNhapDAO
        Return tk.GetTaiKhoan()
    End Function
    Public Sub AddTaiKhoan(ByVal newTK As DangNhapDTO)
        Dim tk As New DangNhapDAO
        tk.AddTaiKhoan(newTK)
    End Sub
    Public Sub DelTaiKhoan(ByVal delTK As DangNhapDTO)
        Dim tk As New DangNhapDAO
        tk.DelTaiKhoan(delTK)
    End Sub
    Public Sub UpdateTaiKhoan(ByVal newTK As DangNhapDTO)
        Dim tk As New DangNhapDAO
        tk.UpdateTaiKhoan(newTK)
    End Sub
End Class
